(face-italic-p): Return t only for values `italic'

and `oblique'.

diff --git a/lisp/faces.el b/lisp/faces.el
index ad4a00c7c33b2d2b7ec5578b2cb34661fd8974a7..c8df93071cb1204551c421c414c628d9102ed923 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -380,7 +380,7 @@ If FRAME is t, report on the defaults for face FACE (for new frames).
 If FRAME is omitted or nil, use the selected frame.
 Use `face-attribute' for finer control."
   (let ((italic (face-attribute face :slant frame)))
-    (not (memq italic '(normal unspecified)))))
+    (memq italic '(italic oblique))))